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Y ; DETAILED 
ATIONS 
ET = IMAGE }f0 SEGMENT RESET 
~ INITIALIZE IMAGE 1/0 SEGMENT 
CACHE _BLKAST = DIRECTORY CACHE BLOCKING AST 
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RMSRESET = RMS IMAGE 1/0 SEGMENT REINITIALIZE ROU 16*SEP=1984 01:03:50 VAX/VMS Macro v06-00 ° 
00-000 Re Pa et ee a ay ats 


-TITLE RM yeni - RMS IMAGE 1/0 SEGMENT REINITIALIZE ROUTINE 
IDENT ‘V 


s eeneseoseoreerbensueneodnoensennanenbeneneeneensseeesonsnsonenesenesecerene 


COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


’ * 
7* * 
3* * 
3* ® 
7* ® 
3* ® 
3* FT ryt, IS FURNISHED UNDER A LICENSE AND MAY BE USED AND sori’ * 
3@ ACCORDANCE WITH THE TERMS OF SUCH bie ENSE AND WITH THE * 
7* USION OF THE ABOVE ptt NOTICE. THIS SOFTWARE OR ANY OTHER * 
7* ES THEREOF on NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
:* R PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
3* TRANSFERRED. * 
;* * 
2* * 
3* * 
s* ® 
7* & 
3* ® 
3* ® 
7* ® 
3* + 
3* ® 


1G 
$ $0 
Y IN 
LUSI 
IES 
ER P 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
HOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


OOOCCCOBOOCOGOOOOOOCOoOoOoO 
OQOQCoooCooCooooooooooeo 


A 
CORPORATION. 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 
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S 


OOOCOCOCOOoCOOCOOoOOOCSOooOOOCOOCOSCOSOSOSOSOOOCOOCOOOOOOOOOOOOOOOoOOO 


REET AAAAAAA AAA AA AAA AAAAAAAAAAAAAAAAAAAARAAAAAARERAAAAAA AREA AAAAE 


"FACILITY: EXECUTIVE, IMAGE ACTIVE AND RESET ROUTINES 
ABSTRACT: REINITIALIZES RMS IMAGE 10 SEGMENT LIST HEADERS. 
ENVIRONMENT: KERNEL MODE. 


~SBTTL HISTORY ; DETAILED 
AUTHOR: LEO LAVERDURE , CREATION DATE: 21-FEB-78 
MODIFIED BY: 


v03-002 wmMc0001 Wayne Cardoza 19-Mar-1984 
RMSSET routine to initialize the image 1/0 area. 


v03-001 $RBO111 Steve Beckhardt 10-Feb-1984 
acter, Stoeh tng AST routine for RMS directory cache 
nvalidate 
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~SBTTL DECLARATIONS 


INCLUDE FILES: 


SOOSCOCOCOCSOOOCSOSoOOOOOCOOCOOOSOOSOOCSOOSOOCOoOOOo 


Cooooo 
NAME AN 29 OO NAUE WIN HOOD NAME WN OOD NAME WR OOWONOAU EW OWOONOUE Wn 


PUPVPVI PIII EB BB BB BE AAAI NII NII HID PONPINOPNONPONPIPY I 2 SS SS OO OS 


COCOOSOSOSOOOOOOOOOOOOOSOOOSOOOOOSOOSOOOSOOOoOOO 


SQOooooooooooooo 


SDYNDEF DATA STRUCTURE TYPE CODES 
; SIHDDEF 7 IMAGE HEADER DEFINITIONS 
SIMPDEF RMS IMPURE AREA DEFINITIONS 
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vita DECLARATIONS BrSEe 1984 Osinesee ere ee HAGce NOt OO. oe 4, 


58 SSSDEF SYSTEM STATUS DEFINITIONS 
SUCBDEF [UCB DEFINITIONS 
+ EXTERNAL SYMBOLS: 
65 ; 
00 
0 
00 


; MACROS: 


: EQUATED SYMBOLS: 
OWN STORAGE: 


NNN NAAAOO 
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RMSRESET = RMS IMAGE 1/0 SEGMENT RE INITIALIZE ROU 16-SEP-1984 01:03:50 VAX/VMS M he p $ 
eta RMSRESET IMAGE 100 SEGRENT RUSE Breer oke Obicesee Peneves Hacce YOr-OO. nett vl 
LSBTTL RMSRESET = IMAGE 1/0 SEGMENT RESET 
+e 
8 ; FUNCTIONAL DESCRIPTION: | 
0 
1} CALLING SEQUENCE: 
0 ¢ BSBW -RMSRESET 
0 4 MAY BE CALLED FROM EITHER EXEC OR KERNEL MODE 
8 S INPUT PARAMETERS: 
000 «88: 
000 9 : IMPLICIT INPUTS: 
09 0 
00 : NONE 
9000 92 
0 
00 
00 
00 
00 
8 
0 


8 RERHSAA ERATE AAA AAA AAAAAAAAAAAAAAAAAAARAAAAAAAAAAAAAAAARAEAAAAE 


: weeeeeeereeeeeee THE FOLLOWING CODE MAY BE PAGED *eeeeeeeeeerereee 


1 
§ 
6 
5 
5 f -PSECT YSEXEPAGED 
5 
0 
1 


0000 , 


WEE RRARAAASAARARSARRASALARSARERERERERSALASESRRARARRRRARS RASA RRS RR ARDS SS OD 


78 ; 
90 ; 
3) 
38 37 ; OUTPUT PARAMETERS: 
00 95; RESETS THE IMAGE 1/0 FREE PAGE LIST TO EMPTY 
00 . 36 ; RESETS THE IMAGE I/O FREE SPACE LIST TO EMPTY 
00 97 ; ZEROES THE IMAGE I/O SEGEMENT BASE ADDRESS AND LENGTH 
0000 98 ; ZEROES THE IMAGE I/O IFAB AND IRAB TABLE LINK ADDRESSES 
0000 99 ; IF NO ACTIVE IMAGE 1/0 IFABS, EXITS WITH SUCCESS, ELSE 
0000 100; ZEROES THE # OF ACTIVE IFABS 
0000 101; ZEROES THE IMAGE I/O IFAB AND IRAB TABLES 
8000 19 ; EXIT WITH STATUS SS$_MUSTCLOSEFL 
0000 104 ; RO = ERROR STATUS CODE 
44 105 ; R1,R2 ARE DESTROYED 
000 106 ; 
0000 107 ; IMPLICIT OUTPUTS: 
0000 108 ; NONE 
44 109 ; 
000 110 ; COMPLETION CODES: 
4 111 ; SEE ABOVE 
000 16 ; 
O08 HF ; SIDE EFFECTS: 
$00 115 ; If AN ERROR IS RETURNED, THE IMAGE 1/0 FILES CANNOT BE RUN DOWN. 
000 11g ; THIS IS OF LITTLE CONSEQUENCE AS THIS IS AN ERROR CONDITION 
000 117; ARISING FROM THE CLI'S FAILURE TO DO THE RUNDOWN BEFORE STARTING 
000 18 : ANOTHER IMAGE. THE IMAGE MAY BE STARTED. 
00 120 ;-- 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
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RMSRESET = RMS IMAGE 1/0 SEGMENT REINITIALIZE ROU 16-SEP-1984 01:03: AX/VMS Macro V04-00 Page 
VOn e600 RMSRESET = IMAGE 1/0 SEGMENT RESET §-§ ety 84:03:28 LEYS SRCIRMSRESET -MAR: 1 . (3) 
52 00000000'9F oD : 1 ; MOVAL asPLO$GL_I10FSPLH,R2 ;RMS FREE PAGE LIST HEAD 
6 D 1 MOVL R2,(R2) [MAKE THIS LIST EMPTY 
04 A D A 134 MOVL R 24(Re) STAIL POINTS AT HEAD 
000¢' DE 135 MOVAL W <P10 GW_IIOIMPA - “FORM ADDRESS OF IMAGE 1/0 
1 1 : +1MP : FREEPGLH=PIOSGL_ISOFSPLH>(R2) ,R2 ;FREE PAGE LIST 
62 0 1 1 MOVL 2, (RET ;MAKE THE LIST EMPTY 
04 A D 16 8 MOVL R2,4(R2) :TAIL POINTS AT HEAD 
1A 140 ASSUME MPSt IOSEGLEN EQ IMPS$L_IOSEGADDR+4 
FB AZ 7C OO1A 141 CLRQ  <IMP$C_IOSEGADDR-IMPSL_FREEPGLH>(R2) zNO IMAGE 1/0 SEGMENT 
0C B2 04 001 148 CLRL QIMPSLIFABTBL~IMPSL_FREEPGLH(R2) :ZERO IFAB TABLE LINK 
10 B2 D4 0 14 CLRL = @IMPSL TRABTBL -IMPSL FREEPGLH(Re) 32ERO IRAB TABLE LINK 
16 Ad BS 144 TSTW TMP SW_AUM_1FABS~IMP C_FREEPGLH(R2) TANY ACTIVE IFABS? 
06 12 00 6 145 BNEQ 0$ *BRANC 
50 01 D 00 146 MOVL #1,R0 :SHOW SUCCESS 
0 0 8 147 RSB ‘BACK TO CALLER 
09 ¢ 149 : 1/0 RUNDOWN NOT DONE!! 
00 c 131 ; JUST CLEAR THE IFAB AND IRAB TABLE POINTERS SO THAT RMS CAN CONTINUE. 
09 ¢ 138 ; (ASSUMES THAT THE IFAB TABLE IS IMMEDIATELY FOLLOWED BY THE IRAB TABLE.) 
16 A2 B4 002C 155 fos: CLRW § IMPSW_NUM_IFABS-IMPSL_FREEPGLH(R2) :SAY NO ACTIVE iFABS 
52 OC A2 DO O02F 136 MOVL  IMPSL-IFABTBL-IMPS$L_FREEPGLH(R2) ,R2 [GET ADDR OF IFAB TABLE 
nn 6 CUM bd 0033 15 MOVL #IMPST_ENTPERSEG+1,R1 :_# OF QUADWORDS TO ZERO 
82 C 0036 158 20S: CLRO = (R2)+ [ZERO IFAB AND IRAB ADDRS 
FB 51 36FS) «(00 159 SOBGTR R1,20$ :LOOP 
50 0948 BF 3¢C 0038 160 MOVZWL #SS$_MUSTCLOSEFL,RO SFAILURE STATUS 
05 0040 161 RSB 


RMSRESET = RMS_ IMAGE 
VOL-600 RMSSET - NIT 
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IMAGE 1/0 SEGMENT ~REb= 198s BSi2k:3g PANEMRS acre Ot OO et age 3, 


«SBTTL RMSSET = INITIALIZE IMAGE I/0 SEGMENT 


ra 


p++ 
; FUNCTIONAL DESCRIPTION: 


CALLING SEQUENCE: 


BSBW RMSSET 
MAY BE CALLED FROM EITHER EXEC OR KERNEL MODE 


OOOOOCOOCOCOoO 
et et ee ee et et ete ee 


OOOH BLO LOR C0 8 a a a a ot 


; INPUT PARAMETERS: 


RO = IMAGE HEADER LINK FLAGS 
Ri => DESCRIPTOR OF EXiMA IMAGE 1/0 SEGMENT SPACE 


; IMPLICIT INPUTS: 
NONE 
; OUTPUT PARAMETERS: 
RO,R1,R2 ARE DESTROYED 
IMPLICIT OUTPUTS: 
NONE 


COMPLETION CODES: 
NONE 


SOOSSCSOSSSOSOSSOSOSOSSSOOOOOOOOSOO COCO 
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ROPOPIPOPIPOPIPOPOPOPIMINPIMYNIMINIPINYID) 2 = tt tt 


SOOSQOOSOSOSOOSOOOSOOOCOO SOOO OOSOOOOOSOSOSOSOOOOSOOOOSOOOOOOOOOOoO 


8 
9 
9 
3 
94 SIDE EFFECTS: 
%6 NONE 
9 == 
38 
+ : PARRA SAASLAAAALALALALALASZALALLELALEEESASLESEE SESE ESLER SERRE EERE REA RR RESALES SY 
0 : gkeekererereerere THE FOLLOWING CODE MAY BE PAGED eeeeneerereeereee 
0000 s .PSECT YSEXEPAGED 
"1 : SAKATA AAAAAAAAAARAAAARAARAAAAAAAAAEEAAAAAEAEAAAEAAAAEEEEE 
3% RMSSET 
52.  00000000'EF i: 4 MOVAL PIO$GW_IIOIMPA,R2 IMAGE 1/0 IMPURE AREA 
: cs 4 1 BBCC #IMP$VNOPOBUFS,(R2) ,5$ ASSUME NO PO BUFFERS ALLOWED 
: E1 004 11 5$: BBC #IHDSV-NOPOBUFS.RO, 10$ ECHECK LINK FLAGS 
E 5 1 BBSS  #IMPSVNOPOBUFS, (R2) , 10S N ALLOWED” 
08 A2 0 ‘EF OD 5 13 10$:  MOVL P1O$GQ"11ODEF AULT. IMPSL LOSEGLEN(A2) DEFAULT 1/0 SEGMENT LENGTH 
A2 00000004"EF 0D 5 1 MOVL  PIOSGQ~IIODEFAULT+4, IMPSL_IOSEGADDR<(R2) ;SEGMENT ADDRESS 
61 D 6 15 TSTL (RI) 71S AN ADDITIONAL SEGMENT SPECIFIED 
| 1 BEQL 208 
50 O04 Al OD 6 1 MOVL (R1),RO ADDITIONAL AREA 
8 ag 61 p 6 18 MOVL _— (R1), 8( ROD {LENGTH OF SEGMENT 
CA2 60 OF 1 INSQUE (RO); IMPSL_FREEPGLH(R2) :PUT IT ON FREE LIST 
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RMSSET = INI 


05 0074 


HALE. 


220 208: 
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RSB 
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TORY CACHE BLO met 83:08:28 YOYS SRCIRMSRESET MAR: 1 - (4) 
-SBTTL RMSDIRCACHE_BLKAST = DIRECTORY CACHE BLOCKING AST 

FUNCTIONAL DESCRIPTION: 


THIS ROUTINE IS THE SYS 
CACH LOCATE 


RMSRESET - RAS | 
04600 RMSDIRC 


om 
=m 
2 
m 
oz 
_—4 


i 
oe 
cCr™~ 
Pa 
=» 
ma 


MS TO NOTIC 
O REARM THE LOCK. 


CALLING SEQUENCE: 
JSB RMSDIRCACHE_BLKAST AT IPL$_SYNCH 
INPUT PARAMETERS: 
R1 ADDRESS OF UCB 
OUTPUT PARAMETERS: 
NONE 
SIDE EFFECTS: 
NONE 


Se Se Ge Se Ge Ge Ge Se Ge Ge Ge Ge Ge Se Ge Ge Se Ge Sete Fe Se Sete Se 
; + 


So 
So 
[=] 
So 


»-PSECT AEXENONPAGED 
RMSDIRCACHE BLKAST:: 
CMPE 


1-5-4444 5-4-2 D> > ee 
FRED HEMI AAA SSS SVSTSISISUSUSIOSISISISISIOSIOSIOSIOSIOIOSIOSIOSD «oo 
PROPOIPOPINIPUNININIPIPIPINIPINIPININIMYINAIMININININIPINIPIPIPIPIPIPIPIPIPIPOPUPIPUPIPUNIND 


AAARAXAXAMAAMNAN AAI SS ES ES BS ANNAN NIAAA OPONONONONONNYD 


MEAN OOONAUNS WIN 9 OD NAUSEA OOODNAUE WN OOONAOULSW KO 


10 91 #0YNSC_UCB,- ; MAKE SURE WE ARE POINTING 
OA Al UCBSB_TYPE(R1) ; AT A UCB 
oc 12 BNEQ $ 
QOAC C1 86 INCW UCBSW_DIRSEQ(R1) ; INCREMENT SEQ. # 
8000 8F AA BICW #UCBSA_AST_ARMED,- : INDICATE AST IS NO LONGER ARMED 
OOAC C1 UCB$W_BIRSEQ(R1) 
05 Y} RSB 
13 10$: BUG_CHECK NOTUCBUCB FATAL 
16 
16 
16 
16 ~ END 
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RMSRESET 
Symbol table 


BUG$_NOTUCBUCB 
DYNSC_UC 
1HD$V_NOPOBUF S 
IMPSC"ENTPERSEG 
IMPSL_FREEPGLH 
IMP$L_IF ABTBL 


RMSSE 
SS$_MUSTCLOSEFL 
UCB 


UCBSM_AST_ARMED 
UCBSW_DIRSEQ 


PSECT name 


SABS 
YSEXEPAGED 
AE XENONPAGED 


Initialization 
Command processing 


Pass 1 

Symbol table sort 
Pass 2 

Symbol iable output 


The 
48710 bytes ( 


Psect synopsis output 
Cross-reference output 
Assembler run totals 


ekereeee x 03 
= 9 
= 
= F 
; ; 
= 
= 90000008 
= 05 
= 
= 0000 $ 
Raeeaeeee x 
Reeeeeee xX 
reeeeeee x § 
0000000 RG 
O00000e1 Re 08 
= §00909¢ 
= Q000000A 
= 00008000 
= Q00000AC 
pomemnoeemeseeece + 
; Psect synopsis ! 
Allocation PSECT No. Attributes 
00000000 ( 0.) 00 ¢ QO.) NOPIC 
0000000 (¢ 0.) 1 1.) NOPIC 
00000075 (¢ 117.) Se ¢ §°} NOPIC 
00000016 (¢ 22:) 08 ¢ $2) NoPIC 
ees 
! Performance indicators ! 
Page faults CPU Time Elapsed Time 


working set Limit was 1350 pages. 
pages) of virtual memory were used to buffer 
There were 60 pages of symbol table space allocat 
65 source lines were read in Pass 1, producing 1 
4 pages of virtual memory were used to define 13 macros. 
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d to hold 


SEP=1 
SEP=1 


CON 
CON 
CON 
CON 


84 03:46:38 


L 
ABS L 
L 
L 


OOO 
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L 
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he intermediate code. 
3 non-local and 6 local symbols. 
object records in Pass 2 


AX/VMS Macro V 
SYS.SRCIJRMSRES 


NOSHR NOEXE NORD NOWRT NOVEC BYTE 
NOSHR EXE RD WRT NOVEC B 
NOSHR EXE RD 
NOSHR EXE RD 


04-00 
ET.MAR; 1 (4) 
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WRT NOVEC BYTE 
WRT NOVEC BYTE 
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cro V04-00 


= RMS IMAGE 1/0 SEGMENT REINITIALTZE ROU Ig°§ S p-1986 Ot: 93: 28 Aas A 13 RASRESET MAR: 1 


VARS Macro Run Statistics 


greg 9 Seren: mee ee rae 


: Macro Library statistics ! 


+ Seow een noone aoa seo eneoad 


Macro Library name Macros defined 
~$52 ary? SYS.OBJJL1IB.MLB;1 5 
55$DUA28: CSYSLIBJSTARLET.MLB;2 5 
TOTALS (all Libraries) 10 


1075 GETS were required to define 10 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1IS$:RMSRESET/OBJ=0BJ$:RMSRESET MSRC$:RMSRESET/UPDATE=(ENHS$:RMSRESET) +EXECML$/LIB 
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